home *** CD-ROM | disk | FTP | other *** search
/ QRZ! Ham Radio 3 / QRZ Ham Radio Callsign Database - Volume 3.iso / world / mods / ramsey / fx146_22.txt < prev    next >
Encoding:
Text File  |  1994-06-04  |  3.1 KB  |  87 lines
  1. copied from packet:
  2.  
  3.  Msg# TSF  Size #Rd  Date  Time From   MsgID        To
  4.  1884 BH   4001   1 24-Dec 1410 W9ZGS  22870_WB9NET RAMSEY@ALLBBS (NONE)
  5.  Sb: Ramsey FX146/FX220 diode program
  6.  
  7. For you owners of the new Ramsey FX146 or FX220 transceivers, here is a
  8. Basic program that will print out a series of frequencies versus diode
  9. placement positions.  It is a modification of the Basic program provided by
  10. Ramsey in the instruction book.  To use this Basic program just load
  11. it into your favorite text (ASCII) editor, edit out this junk, save it
  12. as an ASCII file under the name "FXDIODES.BAS" and then load it into
  13. BASICA in your MSDOS machine.  Verne/W9ZGS
  14.  
  15. 1 CLS:PRINT TAB(33);"W9ZGS":PRINT
  16. 2 PRINT"Programming diode placement for the Ramsey FX146 and FX220 transceivers.
  17. 3 PRINT"This program requires that frequencies be entered in KHz with 6 digits &
  18. 4 PRINT"NO decimal points.  A frequency of 145.050MHz would be entered as 145050
  19. 5 PRINT"Output is to printer.":PRINT
  20. 6 INPUT"Enter lowest receiver frequency";LF:LF=LF/5
  21. 7 INPUT"Enter highest receiver frequency";HF:HF=HF/5
  22. 8 INPUT"Enter spacing in KHz";SP:PRINT
  23. 9 LPRINT"       For the Ramsey FX146 or FX220 Transceivers.  By W9ZGS.":LPRINT
  24. 10 LPRINT"                   Place diodes where a 1 is shown.":LPRINT
  25. 11 LPRINT"  FREQ   32768 16384 8192 4096 2048 1024 512 256 128 64 32 16  8  4  2
  26.   1
  27. 12 LPRINT" ------  ----- ----- ---- ---- ---- ---- --- --- --- -- -- -- -- -- --
  28.  --
  29. 13 FOR N=LF TO HF STEP SP
  30. 14 AA=0:BB=0:CC=0:DD=0:EE=0:FF=0:GG=0:HH=0
  31. 15 II=0:JJ=0:KK=0:LL=0:MM=0:NN=0:OO=0:PP=0
  32. 16 IF N=>32768! THEN AA=1
  33. 17 IF N>32768! THEN NA=N-32768!
  34. 18 IF N<32768! THEN NA=N
  35. 19 IF NA=>16384 THEN BB=1
  36. 20 IF NA<16384 THEN NB=NA
  37. 21 IF NA>16384 THEN NB=NA-16384
  38. 22 IF NB=>8192 THEN CC=1
  39. 23 IF NB<8192 THEN NC=NB
  40. 24 IF NB>8192 THEN NC=NB-8192
  41. 25 IF NC=>4096 THEN DD=1
  42. 26 IF NC>4096 THEN ND=NC-4096
  43. 27 IF NC<4096 THEN ND=NC
  44. 28 IF ND=>2048 THEN EE=1
  45. 29 IF ND>2048 THEN NE=ND-2048
  46. 30 IF ND<2048 THEN NE=ND
  47. 31 IF NE=>1024 THEN FF=1
  48. 32 IF NE>1024 THEN NF=NE-1024
  49. 33 IF NE<1024 THEN NF=NE
  50. 34 IF NF=>512 THEN GG=1
  51. 35 IF NF>512 THEN NG=NF-512
  52. 36 IF NF<512 THEN NG=NF
  53. 37 IF NG=>256 THEN HH=1
  54. 38 IF NG>256 THEN NH=NG-256
  55. 39 IF NG<256 THEN NH=NG
  56. 40 IF NH=>128 THEN II=1
  57. 41 IF NH>128 THEN NI=NH-128
  58. 42 IF NH<128 THEN NI=NH
  59. 43 IF NI=>64 THEN JJ=1
  60. 44 IF NI>64 THEN NJ=NI-64
  61. 45 IF NI<64 THEN NJ=NI
  62. 46 IF NJ=>32 THEN KK=1
  63. 47 IF NJ>32 THEN NK=NJ-32
  64. 48 IF NJ<32 THEN NK=NJ
  65. 49 IF NK=>16 THEN LL=1
  66. 50 IF NK>16 THEN NL=NK-16
  67. 51 IF NK<16 THEN NL=NK
  68. 52 IF NL=>8 THEN MM=1
  69. 53 IF NL>8 THEN NM=NL-8
  70. 54 IF NL<8 THEN NM=NL
  71. 55 IF NM=>4 THEN NN=1
  72. 56 IF NM>4 THEN NX=NM-4
  73. 57 IF NM<4 THEN NX=NM
  74. 58 IF NX>2 THEN OO=1
  75. 59 IF NX=2 THEN OO=1
  76. 60 IF NX=3 THEN PP=1
  77. 61 IF NX=1 THEN PP=1
  78. 62 LPRINT N * 5;
  79. 63 LPRINT "  ";AA;"   "; BB;"  "; CC;"  "; DD;"  "; EE;"  "; FF;"  "; GG;" "; HH
  80. ;
  81. 64 LPRINT " ";II;" "; JJ; KK; LL; MM; NN; OO; PP:NEXT:END
  82.  
  83. ----------------------------
  84. Note: I haven't tried or verified this, proceed at your own risk.  Verify
  85. that you're in the band before you transmit.  WA2ISE
  86. that you're in the band before you transmit.  WA2ISE
  87.